10 S=53218:FORL=STOS+29:READP:POKEL,P:NEXT:SYSS
20 DATA120,169,7,133,1,169,0,141,17,208,162,0,173,13,220,41,16
30 DATA240,5,238,32,208,162,15,142,24,212,24,144,236